home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.10 Oct 90 / LZW Source / LComp.r < prev    next >
Encoding:
Text File  |  1989-05-07  |  2.1 KB  |  118 lines  |  [TEXT/MPS ]

  1. #include "Types.r"
  2. #include "SysTypes.r"
  3.  
  4. resource 'ALRT' (1111, "FileSytem Alert", preload, nonpurgeable) {
  5.     {100, 100, 250, 400},
  6.     1111,
  7.     {
  8.     OK, visible, silent;
  9.     OK, visible, silent;
  10.     OK, visible, silent;
  11.     OK, visible, silent
  12.     }
  13. };
  14.  
  15. resource 'DITL' (1111, preload, nonpurgeable) {
  16.     {    /*1*/
  17.         {115, 75, 135, 135},
  18.             button {
  19.                 enabled,
  20.                 "OK"
  21.             };
  22.         /*2*/
  23.         {30, 80, 60, 290},
  24.             StaticText {
  25.                 disabled,
  26.                 "FileSystem Error: ^0"
  27.             }
  28.     }
  29. };
  30.  
  31.  
  32. resource 'ALRT' (1112, "Debugging Alert", preload, nonpurgeable) {
  33.     {100, 100, 250, 400},
  34.     1112,
  35.     {
  36.     OK, visible, silent;
  37.     OK, visible, silent;
  38.     OK, visible, silent;
  39.     OK, visible, silent
  40.     }
  41. };
  42.  
  43. resource 'DITL' (1112, preload, nonpurgeable) {
  44.     {    /*1*/
  45.         {115, 75, 135, 135},
  46.             button {
  47.                 enabled,
  48.                 "OK"
  49.             };
  50.         /*2*/
  51.         {30, 80, 45, 290},
  52.             StaticText {
  53.                 disabled,
  54.                 "^0"
  55.             };
  56.         /*3*/
  57.         {46, 80, 61, 290},
  58.             StaticText {
  59.                 disabled,
  60.                 "^1"
  61.             }
  62.     }
  63. };
  64.  
  65. resource 'BNDL' (1001) {
  66.     'LZWC',
  67.     0,
  68.     {    /* array TypeArray: 2 elements */
  69.         /* [1] */
  70.         'ICN#',
  71.         {    /* array IDArray: 1 element */
  72.             /* [1] */
  73.             0, 1001
  74.         },
  75.         /* [2] */
  76.         'FREF',
  77.         {    /* array IDArray: 1 element */
  78.             /* [1] */
  79.             0, 1001
  80.         }
  81.     }
  82. };
  83.  
  84.     
  85. resource 'FREF' (1001) {
  86.     'APPL',
  87.     0,
  88.     ""
  89. };
  90.         
  91. resource 'ICN#' (1001, "LZWC APPL", purgeable) {
  92.     {    /* array: 2 elements */
  93.         /* [1] */
  94.         $"0000 0000 0000 0000 0000 0000 0000 0300"
  95.         $"0000 0C80 0000 3040 0000 C820 0003 0410"
  96.         $"000C 8208 0030 4104 00C8 208E 0104 105A"
  97.         $"0282 0862 0441 05A2 0820 8622 1010 5A22"
  98.         $"2008 6222 4005 A222 FFFE 2222 9292 2226"
  99.         $"9292 2238 9292 2260 9292 2380 9292 2600"
  100.         $"9292 3800 9292 6000 9293 8000 FFFE",
  101.         /* [2] */
  102.         $"0000 0000 0000 0000 0000 0000 0000 0300"
  103.         $"0000 0F80 0000 3FC0 0000 FFE0 0003 FFF0"
  104.         $"000F FFF8 003F FFFC 00FF FFFE 01FF FFFE"
  105.         $"03FF FFFE 07FF FFFE 0FFF FFFE 1FFF FFFE"
  106.         $"3FFF FFFE 7FFF FFFE FFFF FFFE FFFF FFFE"
  107.         $"FFFF FFF8 FFFF FFE0 FFFF FF80 FFFF FE00"
  108.         $"FFFF F800 FFFF E000 FFFF 8000 FFFE"
  109.     }
  110. };
  111.     
  112. data 'LZWC' (0) {
  113.     /* © 1988 Claris Corp by Dennis Cohen */
  114.     $"1CA9 2031 3938 3820 436C 6172 6973 2043"
  115.     $"6F72 7020 6279 2044 656E 6E69 63"
  116. };
  117.  
  118.